home *** CD-ROM | disk | FTP | other *** search
/ Aminet 8 / Aminet 8 (1995)(GTI - Schatztruhe)[!][Oct 1995].iso / Aminet / text / print / Canon_30.lha / Install-driver < prev    next >
Text File  |  1995-03-25  |  2KB  |  89 lines
  1.  
  2. ; Installation script for Canon BJC-600 driver v3.0
  3.  
  4.  
  5. (
  6.  
  7.     (set @default-dest "Sys:Prefs")
  8.   
  9.     (working "Copying Canon driver's files to RAM:...")
  10.  
  11.     ; Preset the percent-done stuff
  12.     
  13.     (set totalfiles 3)
  14.     (set accum 0)
  15.     (set pct (/ (* accum 100) totalfiles))
  16.     (set accum (+ accum 1))
  17.     (complete pct)
  18.  
  19.     (copyfiles (source "Driver:CanonBJC-600.000")
  20.                 (dest   "ram:")
  21.          )
  22.     (copyfiles (source "Driver:CanonBJC-600.020")
  23.                 (dest   "ram:")
  24.          )
  25.     (copyfiles (source "Driver:CanonBJC-600.prefs")
  26.                 (dest   "ram:")
  27.          )
  28.     (copyfiles (source "Driver:CanonPrefs")
  29.                 (dest   "ram:")
  30.          )
  31.     (copyfiles (source "Driver:CanonPrefs.info")
  32.                 (dest   "ram:")
  33.          )
  34.     
  35.     (complete 10)
  36.  
  37.     (set answer1
  38.         (askchoice
  39.                 (prompt "Choose which driver to install")
  40.                 (choices "68000 standard" "68020+ optimized")
  41.          (help "Selecting '68000 standard' will install the code that runs "
  42.             "on any machine. Selecting '68020+ optimized will install code "
  43.         "that runs only on 68020 and better equipped machines (A1200, "
  44.         "A4000 and accelerated Amigas). If your computer is not equipped"
  45.         " with any of these processors and you install this version, "
  46.         "you'll meet the guru...\n"
  47.          )
  48.                 (default 0)
  49.         )
  50.    )
  51.  
  52.   (if (= answer1 0)
  53.  
  54.       ; install 68000
  55.          (copyfiles (source "ram:CanonBJC-600.000")
  56.                 (dest   "devs:printers")
  57.          )
  58.   )
  59.   ; else install 68020
  60.   (if (= answer1 1)
  61.       (copyfiles (source "ram:CanonBJC-600.020")
  62.                 (dest   "devs:printers")
  63.       )
  64.   )
  65.  
  66. (complete 40)
  67. (copyfiles (source "ram:CanonPrefs")
  68.                 (dest   "sys:prefs")
  69. )
  70. (complete 70)
  71. (copyfiles (source "ram:CanonPrefs.info")
  72.                 (dest   "sys:prefs")
  73. )
  74. (complete 80)
  75. (copyfiles (source "ram:CanonBJC-600.prefs")
  76.                 (dest   "ENVARC:sys")
  77. )
  78. (complete 90)
  79. (copyfiles (source "ram:CanonBJC-600.prefs")
  80.                 (dest   "ENV:sys")
  81. )
  82. )
  83.  
  84.  
  85. (complete 100)
  86.  
  87. (exit)
  88.  
  89.